-module(test).
-export([run/0]).

run() ->
    A = class_Alpha:synchronous_new(1,2),
    A ! {getField1,[],self()},
    receive
        {wooper_result,F1} ->
            io:format( "field1: ~p~n", [ F1 ] )
    end,
    A ! {setField1,42},
    A ! {getField1,[],self()},
    receive
        {wooper_result,F2} ->
            io:format( "field1: ~p~n", [ F2 ] )
    end,
    A ! delete.